home *** CD-ROM | disk | FTP | other *** search
/ Amiga Magazin: Amiga-CD 1998 February / Amiga-CD 1998 #2.iso / makeassign < prev    next >
Text File  |  1997-05-25  |  4KB  |  168 lines

  1. ;
  2. ; $VER: MakeAssign 2.0 © MagnaMedia (18. April 1996)
  3. ;
  4. ; Erstellt und
  5. ; angepaßt von: David Göhler
  6. ;
  7. ; erzeugt alle nötigen Assigns für die Installations-
  8. ; routinen der Programme
  9.  
  10. ; damit dieses Skript nicht unkontrolliert abbricht
  11. Failat 21
  12.  
  13. ; etwas für die Geschwindigkeit tun
  14. Resident >NIL: C:Assign
  15.  
  16. Assign >NIL: exists ENV:AmigaCD
  17. if warn
  18.    c:makedir >NIL: ENV:AmigaCD
  19. endif
  20.  
  21. ; testen, ob zu installieren oder zurückzunehmen ist
  22. getenv AmigaCD/assign_global >NIL:
  23. if WARN
  24.  
  25.    setenv AmigaCD/assign_global 1
  26.    ;
  27.    ; zuerst Assigns, die jede CD benötigt
  28.    ;
  29.  
  30.    echo "Installiere alle nötigen Assigns " NOLINE
  31.    ; cd Amiga_1996_9: nicht nötig
  32.  
  33.    ; zum Abspielen von Animationen
  34.    Assign >NIL: MABroadcast:     :Tools/MVB_PD             ADD
  35.    echo "*e[43m·*e[40m" NOLINE
  36.  
  37.    ; für das Jahresinhaltsverzeichnis
  38.    Assign >NIL: TWIST: :AMIGA-Magazin/Jahresinhalt_89_bis_97
  39.    Assign >NIL: TWISTICON:       TWIST:ICONS
  40.    echo "*e[43m·*e[40m" NOLINE
  41.  
  42.    ; wegen der AmigaGuide-Library
  43.    Assign >NIL: LIBS:            :libs                     ADD
  44.    echo "*e[43m·*e[40m" NOLINE
  45.  
  46.    ; wegen AWeb
  47.    Assign >NIL: LIBS:            :tools/Aweb/Classes       ADD
  48.    echo "*e[43m·*e[40m" NOLINE
  49.  
  50.    ; wegen der PD-Disketten
  51.    Assign AMIGA-Magazin-PD:      :Tools
  52.    echo "*e[43m·*e[40m" NOLINE
  53.  
  54.    ; wegen des WB-Starters
  55.    Assign L: :L add
  56.    echo "*e[43m·*e[40m" NOLINE
  57.  
  58.    Assign MUI: exists >NIL:
  59.    if warn
  60.       setenv AmigaCD/MUI_Remove 1
  61.       ;BEGIN MUI
  62.       if exists ":Aminet/MUI_3.3"
  63.          assign MUI: ":Aminet/MUI_3.3"
  64.          echo "*e[43m·*e[40m" NOLINE
  65.          if exists MUI:Libs
  66.             assign add LIBS: MUI:Libs
  67.             echo "*e[43m·*e[40m" NOLINE
  68.          endif
  69.          if exists MUI:Locale
  70.             assign add LOCALE: MUI:Locale
  71.             echo "*e[43m·*e[40m" NOLINE
  72.          endif
  73.          version >nil: exec.library 39
  74.          if not warn
  75.             if exists MUI:Docs
  76.                if exists HELP:dummy ; do not remove
  77.                endif                ; this entry!
  78.                assign add HELP: MUI:Docs
  79.                echo "*e[43m·*e[40m" NOLINE
  80.             endif
  81.          endif
  82.       endif
  83.       ;END MUI
  84.    endif
  85.  
  86.    ; Testen, ob ssa.library neu genug ist
  87.    version >nil: libs:ssa.library Version 4 Revision 160
  88.    if warn
  89.         :c/Requestchoice20 >env:ssaold "Nachfrage" "*nIhre ssa.library ist zu alt oder nicht vorhanden!*nSie können daher die Anims nicht ansehen.*nNeue ssa.library nach libs: kopieren?" "Ja, kopieren" "Nein"
  90.         if $ssaold EQ 1
  91.             copy >nil: ":Grafik/Anims-95/SSAMultiPlay/ssa.library" libs:
  92.             if WARN
  93.                 :c/Requestchoice20 >nil: "Information" "Kopieren fehlgeschlagen!*nVersuchen Sie es nach einem Neustart!" "Ok"
  94.             else
  95.                 :c/Requestchoice20 >nil: "Information" "Kopieren erfolgreich beendet" "Ok"
  96.             endif
  97.             :Grafik/Anims-95/SSAMultiPlay/FlushMem
  98.         endif
  99.    endif
  100.  
  101.    ;
  102.    ; hier kommen die Assigns speziell für diese CD
  103.    ;
  104.  
  105.  
  106.    ;
  107.    ; Falls man nicht weiß, ob schon Assigns existieren, die
  108.    ; man beim Zurücknehmen überschreiben würde, wie bei MUI verfahren
  109.    ;
  110. Else
  111.    ; sonst alle Assigns wieder zurücknehmen
  112.    echo "Nehme alle benötigten Assigns zurück " NOLINE
  113.    ; cd Amiga_1996_9: nicht nötig
  114.    unsetenv AmigaCD/assign_global
  115.  
  116.    Assign >NIL: MABroadcast:                               REMOVE
  117.    echo "*e[43m·*e[40m" NOLINE
  118.  
  119.    Assign >NIL: TWISTICON:
  120.    Assign >NIL: TWIST:
  121.    echo "*e[43m·*e[40m" NOLINE
  122.  
  123.    Assign >NIL: LIBS:            :libs                     REMOVE
  124.    echo "*e[43m·*e[40m" NOLINE
  125.  
  126.    Assign >NIL: LIBS:            :tools/Aweb/Classes       REMOVE
  127.    echo "*e[43m·*e[40m" NOLINE
  128.  
  129.    ; wegen der PD-Disketten
  130.    Assign AMIGA-Magazin-PD:
  131.    echo "*e[43m·*e[40m" NOLINE
  132.  
  133.    ;wegen des WB-Starters
  134.    Assign L: :L REMOVE
  135.    echo "*e[43m·*e[40m" NOLINE
  136.  
  137.    getenv AmigaCD/MUI_Remove >NIL:
  138.    if not warn
  139.       unsetenv AmigaCD/MUI_Remove
  140.  
  141.       Assign >NIL: HELP:            MUI:Docs                  REMOVE
  142.       echo "*e[43m·*e[40m" NOLINE
  143.  
  144.       Assign >NIL: LOCALE:          MUI:Locale                REMOVE
  145.       echo "*e[43m·*e[40m" NOLINE
  146.  
  147.       Assign >NIL: LIBS:            MUI:Libs                  REMOVE
  148.       echo "*e[43m·*e[40m" NOLINE
  149.  
  150.       Assign >NIL: MUI:             REMOVE
  151.       echo "*e[43m·*e[40m" NOLINE
  152.  
  153.    Endif
  154.  
  155.    ;
  156.    ; hier kommen die Assign-Remove-Befehle speziell für diese CD
  157.    ;
  158.  
  159.  
  160.  
  161. Endif
  162.  
  163. Echo " OK!"
  164.  
  165. ; und wieder aufräumen
  166. Resident >NIL: C:Assign REMOVE
  167.  
  168.